`present` <-
structure(list(year = c(1940, 1941, 1942, 1943, 1944, 1945, 1946, 
1947, 1948, 1949, 1950, 1951, 1952, 1953, 1954, 1955, 1956, 1957, 
1958, 1959, 1960, 1961, 1962, 1963, 1964, 1965, 1966, 1967, 1968, 
1969, 1970, 1971, 1972, 1973, 1974, 1975, 1976, 1977, 1978, 1979, 
1980, 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 
1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 
2002), boys = c(1211684, 1289734, 1444365, 1508959, 1435301, 
1404587, 1691220, 1899876, 1813852, 1826352, 1823555, 1923020, 
1971262, 2001798, 2059068, 2073719, 2133588, 2179960, 2152546, 
2173638, 2179708, 2186274, 2132466, 2101632, 2060162, 1927054, 
1845862, 1803388, 1796326, 1846572, 1915378, 1822910, 1669927, 
1608326, 1622114, 1613135, 1624436, 1705916, 1709394, 1791267, 
1852616, 1860272, 1885676, 1865553, 1879490, 1927983, 1924868, 
1951153, 2002424, 2069490, 2129495, 2101518, 2082097, 2048861, 
2022589, 1996355, 1990480, 1985596, 2016205, 2026854, 2076969, 
2057922, 2057979), girls = c(1148715, 1223693, 1364631, 1427901, 
1359499, 1330869, 1597452, 1800064, 1721216, 1733177, 1730594, 
1827830, 1875724, 1900322, 1958294, 1973576, 2029502, 2074824, 
2051266, 2071158, 2078142, 2082052, 2034896, 1996388, 1967328, 
1833304, 1760412, 1717571, 1705238, 1753634, 1816008, 1733060, 
1588484, 1528639, 1537844, 1531063, 1543352, 1620716, 1623885, 
1703131, 1759642, 1768966, 1794861, 1773380, 1789651, 1832578, 
1831679, 1858241, 1907086, 1971468, 2028717, 2009389, 1982917, 
1951379, 1930178, 1903234, 1901014, 1895298, 1925348, 1932563, 
1981845, 1968011, 1963747)), .Names = c("year", "boys", "girls"
), row.names = c(NA, 63L), class = "data.frame")
